<?php

class Tag_Money{
	static $XSL='';
}

Tag_Money::$XSL = <<<EOD
<xsl:template name="formatMoney">
<xsl:param name="abs_value"/>
<xsl:param name="s"/>
<xsl:variable name="cooper" select="\$abs_value mod 100"/>
<xsl:variable name="silver" select="floor(\$abs_value div 100) mod 100"/>
<xsl:variable name="gold" select="floor(\$abs_value div 10000)"/>
<span class="riches">
<xsl:value-of select="\$s"/>
<xsl:if test="\$gold &gt; 0">
<xsl:value-of select="\$gold"/><span class="gold-coin"></span>
</xsl:if>
<xsl:if test="\$silver &gt; 0">
<xsl:value-of select="\$silver"/><span class="silver-coin"></span>
</xsl:if>
<xsl:if test="\$cooper &gt; 0">
<xsl:value-of select="\$cooper"/><span class="copper-coin"></span>
</xsl:if>
</span>

</xsl:template>
<xsl:template match="i:money">
<xsl:choose>
	<xsl:when test="starts-with(@value, '-')">
		<xsl:variable name="s" select="'-'"/>
		<xsl:variable name="abs_value" select="substring(@value, 2)"/>
		<xsl:call-template name="formatMoney">
			<xsl:with-param name="s" select="\$s"/>
			<xsl:with-param name="abs_value" select="\$abs_value"/>
		</xsl:call-template>
	</xsl:when>
	<xsl:otherwise>
		<xsl:variable name="s" select="''"/>
		<xsl:variable name="abs_value" select="@value"/>
		<xsl:call-template name="formatMoney">
			<xsl:with-param name="s" select="\$s"/>
			<xsl:with-param name="abs_value" select="\$abs_value"/>
		</xsl:call-template>
	</xsl:otherwise>
</xsl:choose>
</xsl:template>
EOD;
